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摘 要: 面 对 越 来 越 复杂 的 峙 入 式 应 用 需求 以 及 当今 戏 入 式 操 作 系 统 研究 领域 吏 待 解决 的 重 构 、 移 植 、 维 护 、 可 信 、 
多 核 、 众 核 等 诸多 难题 ， 采 用 Forth 虚拟 机 技术 ， 对 基于 Forth 虚拟 机 架构 的 岁入 式 操 作 系 统 关键 技术 进行 探索 ， 提 出 
一 种 具有 良好 扩展 和 移植 特性 、 高 效 精简 的 基于 Forth 虚拟 机 的 峙 入 式 多 任务 操作 系统 体系 架构 。 该 架构 采用 分 类 存 
储 映 射 、Forth 向 量 定 义 和 用 户 变量 分 离 ， 实 现 了 代码 共享 和 多 任务 管理 。 实 验 结 果 表 明 ， 基 于 Forth 虚拟 机 架构 的 谱 
入 式 操作 系统 在 发 挥 Forth 系统 固有 特性 的 同时 ， 减 少 了 资源 占用 ， 提 高 了 系统 的 灵活 性 及 运行 效率 。 
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CS Abstract: Faced with more and more complex embedded application requirements and urgent problems of the current embedded 


operating system research areas, such as reconstruction, transplantation, maintenance, trusted, multi-core, many-core and so on, 
this paper proposed an embedded multitask operating system architecture, which presents better scalability, transplantation, 


streamlined and efficient by exploring the key technologies of embedded operating system based on Forth virtual machine 


和 的- technology. The architecture Implemented code sharing and multitask managing, by using the methods of classification Storage 


mapping, Forth vector definition and user variable Separation. The experiment results demonstrate that the embedded operating 


System architecture based on Forth virtual machine takes advantage of the inherent characteristics of the System, reduces the 
resources consumption, and improves System flexibility and operational efficiency. 
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进一步 考虑 ， 若 以 上 系统 是 一 个 解释 /编译 的 双 状 态 系 统 ， 那 么 

代码 维护 将 变 得 更 加 直接 而 且 迅 捷 ， 若 应 用 程序 是 积木 式 的 架 
在 以 往 嵌 入 式 系统 研究 过 程 中 ， 不 断 碰 到 现场 不 间断 运行 。 构 ， 那 么 代码 修复 只 需要 简单 蔡 换 存在 Bug 的 模块 ， 而 不 需要 
维护 的 困扰 .许多 在 线 运 行 的 能 入 式 固件 出 现 Bug 或 要 升级 时 ， 重新 加 载 整个 程序 。 ean ed 
往往 都 需要 宕 机 后 在 现场 进行 更 新 与 维护 ， 甚 至 需要 撤离 现场 ”有限 情 况 下 复杂 应 用 需求 的 操作 系统 呢 ? 答案 之 一 便 是 基于 
带 入 实验 室 才能 解决 ， 将 更 新 、 维 护 好 的 固件 重新 烧 录 到 系统 ”Forth 虚拟 机 架构 的 嵌入 式 多 任务 操作 系统 (FVMOS, embedded 
中 。 在 某 些 特殊 的 应 用 场合 ， 就 需要 一 种 全 新 的 可 重 构 、 可 扩 multi-task operating System based on the Forth virtual machine 
展 并 且 能 够 在 线 交 互 的 实时 多 任务 操作 系统 。 例 如 在 不 间断 的 architecture )。 
远程 空间 观测 应 用 中 ， 就 期 望 有 这 类 操作 系统 的 支持 : 可 创建 Forth 语言 本 身 就 是 一 种 过 程控 制 语言 和 一 种 快速 开发 环 
观测 、 控 制 、 采 集 、 处 理 、 通 信 、 监 测 等 一 系列 并 发 任务 ， 当 ” 境 ， 而 不 仅仅 是 一 个 单纯 的 编程 工具 ， 具 有 很 强 的 交互 性 、 构 
某 一 任务 的 应 用 程序 出 现 故 障 时 ， 在 系统 不 宕 机 和 不 影响 其 他 ， 造 性 、 移 植 性 和 自 扩展 能 力 ， 以 及 高 效 的 生成 代码 ， 甚 至 可 以 
任务 执行 的 情况 下 ， 通 过 远程 终端 强制 阻塞 该 任务 ， 完 成 在 线 。 ”快速 构造 出 一 个 实时 多 任务 操作 系统 I。Forth 语言 自发 明 以 来 ， 
修改 或 下 载 更 新 后 ， 重 新 让 该 任务 进入 就 绪 状 态 ， 启 动 运行 。 先后 形成 了 FIG-Forth 、Forth-79、.Forth-83、ANSIX3.215-1994DI、 
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my 


录用 稿 


ISO/IEC 15145 :1997、FORTH-2012B] 等 标准 。 目 前 ，Forth 语言 
已 越 来 越 广泛 地 用 于 设计 嵌入 式 软件 和 固件 ， 例 如 FlashForth 


(PIC18Fxxxx); PicForth( PIC16F8xx); hForth(x86 StrongARM); 


Quartus Forth (Palm Pilot)、F68KANS (68K); Forth for the 
TMS320C50 由、Mecrisp-Stellaris (ARM-Cortex )、PunyForth 
(ESP8266)、AmForth (Arduino AVR8) 等 等 系统 ， 几 平 涵盖 
了 所 有 主流 的 嵌入 式 处 理 器 。 严 格 讲 ， 以 上 这 些 都 仅仅 只 是 
Forth 语言 编程 环境 ， 真 正 将 Forth 推 向 操作 系统 领域 的 是 美国 
KittPeak 天 文 台 开发 的 Stand Alone Forth11G1, 并 一 直 成 为 Forth 
操作 系统 保持 至 今 的 标杆 。 
Stand Alone Forthll 系统 , 其 主体 实际 是 一 个 具有 快速 IO 
能 力 的 多 任务 操作 系统 ， 其 最 显著 的 特点 是 利用 了 PDP-11 小 
型 机 的 页 地 址 映射 实现 了 Forth 字典 的 共享 。 除 ROM 内 监控 
导 引 程序 外 ， 整 个 系统 代码 仅 为 40K。 此 后 出 现 的 Stand Alone 
Forth88 中 ， 由 于 缺少 页 地 址 映射 机 制 ， 没 有 实现 代码 的 复 用 ， 
每 个 任务 都 是 一 个 独立 运行 的 虚拟 机 ， 占 据 64K 内 存 。Chuck 
Moore 在 SEAforth 系列 单 芯 40 核 处 理 器 、100 核 处 理 器 [7-9] 研 
究 的 基础 上 ， 推 出 了 第 一 个 精简 的 嵌入 式 Forth 操作 系统 一 
Colorforth， 其 内 嵌 一 个 多 任务 操作 系统 和 基本 IO 驱动 ,核心 
可 重 入 代码 仅 2K, 现 已 从 最 初 的 RISC 处 理 器 拓展 到 多 个 平台 。 
Colorforth 的 测试 结果 表明 ， 对 同一 个 应 用 ，Forth 的 代码 量 仅 
有 C 语言 的 1%， 而 且 KK 级 的 代码 可 以 完成 传统 M 级 操作 系 
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务 操作 系统 体系 架构 研究 


系统 中 的 一 个 具有 独立 功能 的 程序 。 所 有 Forth 定义 都 以 统一 


的 数据 结构 (词典 结构 ) 组 织 链接 在 一 起 
字 ), Forth 定义 之 间 遵 循 严格 的 有 序 调用 


(LFA 指向 前 一 Forth 
关系 , 即 高 层 Forth 定 


义 只 能 调用 低层 Forth 定义 ，Forth 定义 之 间 的 层次 关系 完全 隐 
含 在 Forth 定义 当中 。 字典 最 底层 的 Forth 定义 为 堆栈 处 理 器 指 


令 组 成 的 代码 或 由 汇编 指令 组 成 的 Code 
义 高 级 定义 )。 


定义 ， 上 层 为 冒号 定 


从 Forth 运行 机 制 看 ，Forth 是 一 个 合并 了 解释 程序 和 编 
译 程 序 的 双 状 态 系统 。Forth 虚拟 机 直接 运行 堆栈 处 理 器 指令 


或 由 汇编 指令 组 成 的 Code 代码 ， 所 不 同 的 是 ， 对 寄存 器 处 理 
器 来 说 , 多 了 一 个 地 址 解释 程序 (或 内 层 解释 程序 , 机 器 原 语 ) 
Next 控制 Code 代码 的 执行 。 在 Next 之 外 ， 还 有 一 个 控制 整 


个 系统 的 主 控 循 环 Quit， 即 解释 编译 程序 。 在 Quit 的 控 仙 


一 


之 


下 ， 一 个 新 输入 /扫描 的 字符 串 若 在 字典 中 被 找到 ， 其 CFA 将 


被 编译 进 字典 〈 编 译 态 ); 或 转向 Next 立即 执行 (执行 态 )。 若 


在 字典 中 没有 找到 ， 就 转换 为 数值 ， 编 
压 入 堆栈 (执行 态 )。 
1.2 FVMOS 


Ee 
下 


进 与 由 (编译 态 ); 或 


在 主流 FVMOS 体系 架构 研究 的 基础 上 ， 本 文 提出 了 
FVMOS 总 体 架 构 ， 如 图 1 所 示 。 架 构 在 CPU 之 上 的 FVM 实 
际 就 是 Forth 的 地 址 解释 程序 NEXT， 其 运行 时 所 用 的 堆栈 是 


当前 运行 任务 在 各 自用 户 变量 区 里 的 私有 堆栈 ， 系 统 上 电 时 ， 


统 相同 的 操作 09。 在 业界 真正 获得 较 大 影响 的 是 Forth 公司 推 


了 


使 用 的 是 Stask 的 堆栈 。FVM 作为 一 级 抽象 很 好 的 屏蔽 了 系统 


出 的 SwiftX， 其 也 内 柑 了 一 个 高 效 精简 的 Forth 多 任务 操作 系 
统 SwiftOS0J， 其 特点 除了 具备 良好 的 移植 特性 外 ， 就 是 系统 


的 硬件 细节 ， 其 指令 指针 存放 在 各 自任 务 的 返回 栈 里 ， 只 需要 


个 当前 用 户 变量 区 指针 UP 就 能 在 任务 间 进 行 切 换 ， 因 此 没 


可 重 构 。 典 型 的 例子 就 是 如 果 不 考 虑 终端 任务 ， 生 成 的 目标 系 
统 中 甚至 可 以 不 包含 文本 解释 器 。 
与 传统 的 操作 系统 架构 不 同 ，FVMOS 并 不 直接 运行 在 硬 
件 处 理 器 上 ， 而 是 与 用 户 任务 程序 一 样 共 同 运 行 在 Forth 虚拟 
机 上 。 因此, FVMOS 的 体系 架构 实质 就 是 多 任务 的 布局 , 与 多 
任务 管理 密 不 可 分 ,虽然 在 前 期 研究 工作 中 ,依据 Forth 思维 ， 
初步 提出 了 一 个 EFOS (Embedded Forth Operating System) 系 
统 框架 03， 但 没有 充分 体现 出 基于 FVM 的 设计 思想 ， 遗 留 了 
若干 有 竺 深入 研究 的 问题 。 本 文 在 主流 FVMOS 多 任务 操作 系 
统 体系 架构 研究 的 基础 上 ， 以 可 重 构 、 可 扩展 、 可 移植 、 可 交 
互 的 多 任务 组 织 管理 为 目标 ， 提 出 一 种 满足 复杂 肉 入 式 应 用 需 
求 的 FVMOS 体系 架构 以 及 相应 的 多 任务 管理 算法 。 


1 FVMOS 总 体 架构 


1.1 Forth 虚拟 机 

FVMOS 的 硬件 平台 既 可 是 硬件 的 Forth 堆栈 处 理 器 ， 也 
可 是 寄存 器 型 处 理 器 。 由 于 操作 系统 是 在 Forth 虚拟 机 上 运行 ， 
这 就 决定 了 其 实现 存在 着 较 大 的 独特 性 。 
从 Forth 系统 结构 看 ，Forth 是 一 个 词典 式 结构 系统 。 词 
若干 字典 组 成 ， 字 上 典 由 Forth 定义 (包含 NF 名 字 场 、LF 
链接 场 、CF 代码 场 、PF 参数 场 ) 组 成 ， 每 个 Forth 定义 对 应 


三 


HEt 


有 传统 上 下 文 切换 的 额外 开销 。 


| TASK1 | TASK2 | TASK3 TASKn | | 
| 和 A gr A 


由 入 和 a 


FVMOS! Forth Virtual Machine OS' Stack/Data 
High Definition Access 


FOS Fo as Interpreter Stack/Data 


System 
High Definition Optional Access 


FVM Forth Virtual Machine Stack 
NEXT 


2 > TCB2 本 
FBS ForthBasic 。 UVO Drive stacWData > 
System Optional Access TA We 
Code Definition f= 二 二 条 
Ds2 
Flash | TCB1 T 


> Textinput Buffer 
Ha > User Variable Area 
> variable Area 


> vectorArea 


图 1 FVMOS 总 体 架 构 


按照 以 往 的 布局 ， 需 要 分 别 建立 FLASH 和 RAM 两 个 字 


， 但 这 种 方式 不 仅 增 加 了 字典 管理 的 玫 


F 销 ， 而 且 在 实际 使 用 


过 程 中 一 旦 系统 掉 电 , 系统 就 会 恢复 到 上 电 前 的 状态 , RAM 中 
动态 加 载 的 任务 就 会 丢失 。 因 此 本 架构 将 在 FVM 上 运行 的 全 


201805.00305v1 


国 


chinaXiIv 


ChinaXiv 合 作 期 刊 
录用 稿 代 红 兵 ， 等 : 基于 Forth 虚拟 机 的 峙 入 式 多 任务 操作 系统 体系 架构 研究 


部 Forth 可 重 入 代码 存放 到 Flash 中 。 其 中 , FBS 的 底层 是 Code ”Robin) 的 特点 , 重新 优化 了 设计 ， 放弃 了 源 自 x86 将 Forth 内 
定义 ， 上 层 是 高 级 定义 。 在 FBS 之 上 是 向 下 依赖 由 高 级 定义 组 。” 存 划 分 为 代码 段 CS: )、 数 据 段 (DS: )、 虚 拟 段 (VS: ) 和 堆 
成 的 FVMOS, 再 往 上 是 由 FVMOS 创建 的 隶属 Stask 的 若干 用 栈 段 (SS: ) 等 四 个 逻辑 独立 段 的 设计 思路 , 建立 Flash、RAM、 
户 任 务 。 为 精简 目标 系统 ， 本 架构 设计 了 可 裁减 的 FBS 选项 ， EFE?PROM 等 三 组 存 取 操作 定义 和 相应 的 指针 ， 分 别 用 于 存放 代 
若 应 用 系统 不 考虑 在 线 交 互 ， 生 成 的 目标 系统 中 可 以 不 包含 文 ” 码 、 数 据 和 参数 。 
本 解释 器 Interpreter。 Flash 里 存放 着 可 重 入 的 FBS 和 FVMOS, 其 分 配 由 DP 指 
RAM 中 有 若干 与 用 户 任务 相对 应 的 由 任务 控制 块 TCB、 针 决 定 ， 存 取 操 作 定义 包括 :,、@I 、IHERE 和 IALLOT 等 。 
返回 栈 RS、 数 据 栈 DS 等 组 成 的 用 户 变 量 区 ， 以 及 文本 输入 绥 。 RAM 里 存放 所 有 程序 运行 的 数据 , 存 取 操作 定义 包括 : !、@、 
冲 区 TIB、 其 他 用 户 变量 区 和 普通 变量 区 等 存储 项 。 风 辑 上 ， HERE 和 ALLOT 等 。 其 中 ，UP 指针 用 于 指示 当前 正在 运行 任 
FBS、FVMOS 都 可 以 进行 RAM 操作 〈 虚 框 细 篇 头 )， 但 物理 。 务 的 用 户 变 量 区 首 址 CTCB )。 一 般 的 嵌入 式 处 理 器 缺乏 页 地 址 
上 ， 系 统 的 存 取 操 作 被 封装 在 FBS 的 底层 Code 定义 中 ， 实 际 。” 映射 和 内 存 保护 机 制 ， 为 实现 代码 保护 ， 可 以 隐藏 Flash 的 显 
操作 是 透 过 这 些 分 类 存 取 指 令 完 成 的 ( 粗 箭 头 )。 与 抢占 式 Stand ” 式 存 取 操 作 。 


由 


出 


Alone Forth88 不 同 ， 协 同 式 FVMOS 支持 终端 任务 、 后 台 任 务 考虑 到 Forth 在 线 交 互 过 程 中 允许 随时 加 载 新 代码 的 复杂 
和 中 断 任务 三 种 任务 类 型 ， 虽 然 三 种 任务 的 TCB 内 容 有 差异 ， 性 ， 在 Forth 系统 中 ，Flash 中 的 DP 是 严格 按 地 址 递增 顺序 进 
但 都 连接 到 多 任务 循环 链表 中 《 右 虚 线 ) 。 行 分 配 的 。 与 之 对 应 的 RAM 里 的 UP 既 可 以 按 实际 需求 进行 


在 体系 架构 方面 ， FVMOS 架构 应 当 在 Forth 核心 词典 和 简单 的 顺序 分 配 ， 也 可 按 动态 分 配 
主 控 循环 Quit 之 上 ， 这 与 直接 在 寄存 器 处 理 器 上 架构 操作 系 ” 现 数据 区 的 动态 存储 管理 。 

统 有 着 明显 的 差异 。 此 外 ， 其 词典 式 生 长 结构 ， 也 与 单 体内 核 ”2.2 可 重 入 与 用 户 变 量 区 

结构 (模块 法 )、 层 次 结构 以 及 微 内 核 结构 等 传统 操作 系统 架构 可 重 入 代码 要 求 除 常 量 之 外 不 能 含有 任何 私有 变量 ， 上 述 
方法 有 着 明显 的 不 同 。 若 仅 考 虑 单 核 Forth 虚拟 机 ， 其 可 选 的 存储 管理 模式 可 以 支持 系统 的 可 重 入 改造 ， 只 要 稍 作 修 改 ， 整 
实时 多 任务 操作 系统 实现 方式 为 : 利用 Forth 自身 的 特点 ， 直 ”个 Forth 系统 就 能 实现 可 重 入 。Forth 系统 的 特点 决定 了 系统 运 
接 用 汇编 、C 语言 或 多 或 Forth 自生 成 器 (可 异 构 ) 生 成 一 个 ” 行 的 大 多 数 参数 及 结果 都 可 以 存放 在 数据 栈 或 返回 栈 中 ， 要 处 
包含 Forth 虚拟 机 的 基本 系统 FBS (Forth Basic System)， 也 就 里 的 字符 串 、 变 量 、 数 组 可 以 保存 到 系统 分 配给 每 个 任务 的 
是 系统 任务 Stask《〈 第 一 个 终端 任务 )， 之 后 在 其 上 定义 封装 : RAM 数据 
插 务 管理 、 内 存 管理 、 设 备 管理 、 错 误 陷 井 等 FVMOS 原 语 构 引入 Forth 用 户 变量 是 实现 以 上 目标 的 关键 。 为 保证 可 重 
后 。 若 存储 在 Flash 中 的 FBS 和 FVMOS 是 可 重 入 的 ， 那 么 新 。 入 ， 可 以 定义 一 些 公共 例 程 去 寻 址 RAM 数据 区 里 的 变量 ， 这 
创建 的 用 户 任务 Utask 只 在 RAM 用 户 变 量 区 中 建立 任务 数据 ” ” 些 变 量 就 是 Forth 用 户 变量 .Forth 用 户 变 量 实际 就 是 地 址 变量 ， 
空间 (运行 在 同一 个 Forth 虚拟 机 之 上 ， 适 合 于 多 核 SMP 横 用 户 变 量 定义 中 PF 里 存储 的 是 该 变量 在 RAM 中 的 地 址 。 

式 )， 和 否则 就 需要 复制 Stask 到 新 的 Flash 和 RAM 工作 区 ( 运 户 变量 区 是 RAM 的 一 块 特殊 区 域 。 每 个 任务 都 可 以 共 
行 在 多 个 虚拟 机 之 上 , 适合 于 多 核 AMP 模式 或 多 核 离 散 模型 )。 享 文本 解释 器 、1O 驱动 等 代码 , 但 每 个 任务 都 有 独自 的 以 用 户 
同时 ， 初 始 Utask 的 任务 控制 块 TCB， 并 将 新 的 TCB 插入 到 ” ”变量 定义 的 操作 数据 ， 这 些 私有 数据 存放 在 RAM 数据 区 的 不 


五 


收 算法 、 绥 冲 池 等 技术 实 


中 。 


[xl 


系统 的 TCB 链表 中 ， 进 入 多 任务 调度 。 同 区 域 ， 这 个 区 域 就 是 用 户 变 量 区 。 
在 抽象 描述 方面 ， 与 微 内 核 的 设计 思路 不 同 ， 由 于 是 在 经 ”2.3 任务 控制 块 
过 一 定 抽象 的 堆栈 虚拟 机 上 运行 ， FVMOS 本 身 就 具有 较 强 的 Forth 操作 系统 多 任务 调度 往往 采用 的 是 协同 式 调度 策略 ， 


跨 平台 移植 性 。 从 层次 上 看 ，FVMOS 并 没有 像 传 统 操作 系统 ”也 就 是 说 每 个 任务 的 启动 时 间 都 是 预先 确定 好 的 。 与 其 他 多 任 
那样 直接 对 硬件 进行 封装 ， 而 是 运行 在 虚拟 机 之 上 。 理 论 上 ， 务 调度 方式 不 同 ，FVMOS 的 协同 式 调度 是 基于 虚拟 机 的 ， 支 
排除 效率 问题 ， 整 个 FVMOS 可 以 不 涉及 任何 汇编 语言 ， 其 原 ” 持 终端 任务 、 后 台 任 务 和 中 断 任务 三 种 任务 类 型 ， 在 上 述 内 存 
语 和 任务 体 都 能 从 FBS 的 Forth 定义 像 搭 积木 一 样 构造 出 来 。 管理 方式 下 ， 现 场 保护 仅 需要 将 当前 返回 栈 指针 RP 压 入 数据 
在 异 构 平 台 的 抽象 化 描述 方面 ， 与 Windows NT、Nanokernel、 栈 ， 并 将 当前 数据 栈 指针 SP 保存 到 该 任务 的 用 户 变量 区 里 。 
eCos 等 基于 硬件 抽象 层 (HAL ) 设计 的 操作 系统 相 比 , FVMOS ” 而 恢复 现场 仅 需 要 从 该 任务 的 用 户 变 量 区 里 恢复 SP, 并 将 栈 顶 
也 有 其 独特 的 特点 和 优势 。 值 存 入 RP 指针 。FVMOS 的 任务 控制 块 (TCB，Task Control 
Block) 就 是 用 户 变 量 区 里 与 多 任务 调度 有 关 的 一 块 特 殊 区 域 ， 
其 结构 如 表 1 所 示 。 
2.1 内 存 分 配 与 管理 TCB 表 中 每 一 项 都 是 通过 用 户 变量 USER 定义 的 , 其 中 基 
在 前 期 研究 的 基础 上 ,针对 组 入 式 的 存储 布局 以 及 Forth 主 ， 本 表 项 (前 六 项 ) 是 每 个 任务 的 必 备 项 ， 而 附加 表 项 是 专门 针 
流 的 协同 调度 算法 (Cooperative scheduling algorithm，Round- 对 终端 任务 而 设置 的 。 附加 表 项 (IO 驱动 ) 存放 的 是 该 终端 任 
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务 的 IO 驱动 向 量 ， 与 该 任务 具体 连接 的 终端 设备 有 关 。 附 加 cfa 


表 项 (解释 器 操作 ) 存放 的 是 该 终端 任务 文本 解释 器 与 状态 有 5 (us ) 8&12 + ALLOT / 在 RAM 中 分 配 用 户 变量 区 (前 6 项 ) 
关 的 操作 向 量 。 需 要 说 明 的 是 TCB 没有 保留 返回 栈 指针 ， 而 是 6 (rs ) ALLOT HERE ，/ 分 配 返 回 栈 ， 将 rpe 保存 到 Flash 该 任 
将 当前 返回 栈 指针 放 在 数据 栈 栈 顶 。 务 定义 的 pfa[@] 
表 1 TCB 结构 7 (ds ) ALLOT HERE ，/ 分 配 数据 栈 ， 将 spe 保存 到 Flash 该 任 
序号 ” 偏 移 名 称 描述 类 别 务 定 义 的 pfa[1] 
1 0 status ”任务 状态 的 xt，UP 指针 8 1 ALLOT /分隔 
2 2 follower 下 一 个 任务 的 TCB 首 址 9 DOES> ; / 执行 任务 时 ， 将 cfa 压 入 数据 栈 
3 4 mp0 返回 栈 楼 底 指针 入 口 参数 ds、rs、us 分 别 是 数据 栈 、 返 回 栈 、 追 加 的 用 户 
4 6 sp0 数据 栈 栈 底 指 针 基本 表 项 区 大 小 ， 通 过 <BUILDS 在 Flash 中 创建 一 个 任务 头 ， 随 后 将 
数据 栈 栈 项 指针 RAM 用 户 变 量 区 中 的 可 用 地 址 HERE (与 之 对 应 ，Flash 操作 
3 A 为 IHERE) 存 入 Flash 任务 定义 的 cf ( 即 TCB 首 地 ), 在 RAM 
6 10 CATCHER 普 误 陷阱 用 户 变量 区 中 分 配 TCB (前 6 项 是 基本 的 )， 分 配 返 回 栈 ， 将 
7 12 BASE 数值 转换 rp0 保存 到 Flash 该 任务 定义 的 pfa[0]， 分 配 数 据 栈 ， 将 sp0 保 
8 114 EMIT 输出 字符 存 到 Flash 该 任务 定义 的 pfa[1]。 当 执行 该 任务 时 (DOES> )， 
9 16 EM? 输出 设备 就 绪 将 cfa 压 入 数据 栈 。 
0 18 TYPE 输出 字符 串 3.2 ”存储 区 互 操作 
11 20 CR 本 车 附加 表 项 (IO 驱 位 于 Flash 的 TIB 与 位 于 RAM 的 TCB 之 间 的 互 操作 由 下 
2 2 PAGE 稀 页 动 ) 列 定义 实现 : 
3 24 AT-XY 移动 光标 向 量 定义 1 : TIB>TCB / TIB 映射 到 tcb [status] 
4 26 KEY 输入 字符 2 @I ;  / TIB 了 映射 到 tcb [rpe] 
5 28 KEY? 输入 字符 就 绪 3 : TIB >RP6 
6 30 ACCEPT 输入 字符 串 4 I-CELL+ QI ; 
7 32 DEVICE 设备 地 址 或 信息 5 : TIB >SP@ / TIB 映射 到 tcb [spe] 
SOUROE 定位 输入 缓冲 区 附加 表 项 6 I-CELL+ I-CELL+ @I ; 
9 36 ) IN 输入 流 中 当前 偏 移 量 (解释 器 ) 7 : TIB >SIZE / TIB 换算 用 户 变量 区 尺寸 SIZE 
20 38 REFILL 填充 输入 缓冲 区 向 量 定义 8 DUP TIB >TCB SWAP TIB >SP@ 1+ SWAP - ; 


其 中 ， 与 RAM 操作 @ 不 同 ，@I 是 从 Flash 里 取 数 。 系 统 保留 
了 Forth 的 习惯 ， 将 常规 的 存 取 操作 符 视 同 为 RAM 操作 。 
3.3 任务 用 户 变量 区 初始 化 

FVMOS 的 调度 原 语 是 PAUSE， 并 通过 引入 可 随时 置换 的 任务 创建 后 ，TASK-INIT 负责 初始 化 该 任务 用 户 变量 区 里 
Forth 向 量 定义 PASS 和 WAKE， 不 用 查找 TCB 表 便 能 实现 任 ”的 TCB 和 堆栈 区 , 设置 缺 省 进 制 为 十 进 制 (Decimal)， 在 尚未 
务 的 快速 切换 。 下 面 重点 讨论 与 操作 系统 体系 架构 有 关 的 任务 。” 链接 任务 体 前 ， 将 该 任务 设置 为 PASS 睡眠 状态 。TASK-INIT 


3 FVMOS 多 任务 架构 及 组 织 管理 


管理 算法 , 针对 Forth 语言 和 Forth 系统 的 特点 ， 本 文中 算法 描 ”定义 算法 如 下 : 
述 语言 采用 了 Forth2012 标准 。 1 : TASK-INIT 
3.1 Flash 任务 定义 2 DUP TIB>TCB OVER TIB >SIZE 8@ FILL / 初始 化 任务 用 户 变量 
在 Flash 的 Forth 字典 里 创建 一 个 特殊 的 任务 定义 ， 将 分 / 区 里 的 TCB 和 堆栈 区 
给 该 任务 的 用 户 变量 区 首 址 保存 到 cfa 代码 场 里 ， 返 回 栈 、 3 DUP TIB >Sp@ OVER TIB>TCB 8&6 + ! / tcb[spe]=tib[spe] 
数据 栈 栈 底 指针 保存 到 pfa 参数 场 里 , 定义 的 cfa 和 pfa 共同 组 4 DUP TIB >Sp@ CELL- OVER TIB>TCB &8 + ! / tcb[Tos] 
成 了 任务 信息 块 (TIB，Task Information Block)，Task 定义 算 5 DUP TIB >RP@ OVER TIB>TCB &4 + ! / tcb[rpe]=tib[rpe] 
法 如 下 : 6 &10 OVER TIB>TCB &12 + ! / tcb[base]=16 
1 / ds rs us "name”-- ds、rs、us 分 别 是 数据 栈 、 返 回 栈 、 追 7 TIB>TCB TASK-SLEEP ; / tcb[@]=PASS 
加 的 用 户 区 大 小 入 口 参数 为 任务 头 执行 时 DOES> 弹 出 的 TIB, 通过 互 操作 
二 转换 为 TCB 地 址 ， 然 后 对 RAM 用 户 变量 区 的 TCB we 
3 <BUILDS / 在 Flash Forth 字典 里 创建 一 个 任务 定义 进行 清除 ， 将 保存 在 Flash 任务 头 中 的 sp0 存储 到 tcb[sp0]， 计 


4 HERE ，/ 将 HERE (RAM 中 TCB 可 用 地 址 ) 存 入 Flash 任务 定义 的 算出 栈 顶 , 保存 到 tcb[TOS], 将 保存 在 Flash 任务 头 中 的 rzp0 存 
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储 到 tcb[rp0]， 设 置 缺 省 十 进 制 ， 最 后 将 初始 任务 状态 设置 为 
PASS 。 
多 任务 存储 架构 如 图 2 所 示 。 
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图 2 多 任务 存储 架构 


3.4 TCB 循环 链表 

在 完成 上 述 创建 、 初 始 化 、 链 接任 务 体 之 后 ， 还 需要 初始 
化 和 构建 多 任务 TCB 循环 链表 , ADD-FIRSTTASK 初始 化 第 一 
个 终端 任务 , 将 其 tcb [status] 设 置 为 WAKE, 并 将 FOLLOWER 
指向 自身 。ADD-FIRSTTASK 定义 算法 如 下 : 


1 : ADD-FIRSTTASK 


2 WAKE STATUS ! / 将 当前 任务 的 tcb [status] 设 置 为 WAKE 
3 UP@ FOLLOWER ! ; / 将 FOLLOWER 指向 自身 
通过 ACTIVATE 原 语 激 活 ， 多 任务 启动 后 ， 允 许 随时 追加 
新 的 任务 ，ADD-NEXTTASK 将 tcb 所 指 的 新 任务 TCB 表 插入 
到 多 任务 循环 链表 中 。ADD-NEXTTASK 定义 算法 如 下 : 


1 / tcb -- 


2 : ADD-NEXTTASK 


3 ['] PAUSE DEFER@ >R / 将 PAUSE 里 的 xt (MULTITASK-SCHEDULE 


/ 或 NOOP) 保存 到 返回 栈 


4 SINGLE / 停止 多 任务 ，PAUSE 被 设置 为 NOOP 

5 FOLLOWER @ / 得 到 当前 任务 的 下 一 个 任务 tcb? 

6 OVER 

7 FOLLOWER ! / 将 tcb 作为 当前 任务 的 下 一 个 任务 

8 shAp CELL+ 

9 ! /将 tcb 任务 的 下 一 个 任务 指向 当前 任务 之 前 的 下 一 个 任务 

18 R> IS PAUSE ; / 恢复 多 任务 

入 口 参数 为 新 添加 任务 的 TCB 首 址 。 考 虑 到 TCB 表 的 访 

问 属 临界 资源 ， 为 支持 动态 任务 添加 ， 一 开始 就 将 任务 调度 向 
量 保存 到 返回 栈 上 。 在 关闭 多 任务 调度 之 后 , 取出 FOLLOWER 
指针 (当前 任务 指向 的 下 一 个 任务 )， 将 新 任务 的 tcb 作为 当前 
任务 的 下 一 个 任务 ， 将 当前 任务 的 下 一 个 任务 作为 新 任务 的 1] 
一 个 任务 。 完 成 TCB 循环 链表 的 直接 插入 之 后 ,从 返回 栈 恢复 
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度 ， 新 添加 的 任务 将 得 到 优先 执行 。 
4 ”实验 评估 


在 Arduino 磐 入 式 硬件 平台 上 , 借助 开源 的 Forth 虚拟 机 ， 
实现 了 FVMOS 基本 框架 和 多 任务 管理 算法 。 实 验 环 境 中 ， 在 
系统 上 电 初 始 化 阶段 ， 先 设计 了 含有 一 个 终端 任务 TASK1 和 
一 个 后 台 任 务 TASK2 的 实验 程序 如 下 : 


1 :Ms (Cn 


-- ) PAUSE 8 ?DO 1MS LOOP ; / 每 隔 n 毫秒 调用 PAUSE 等 待 


2 VARIBLE M / TASK1 中 TASK2 使 用 的 全 局 变量 M 


3 :INIIM(-- )eM!; 
4 $40 $40 8 BACKGROUND-TASK TASK2 / 建立 后 台 任务 TASK2， 在 FLASH 


/ 中 创建 任务 头 ， 分 配 用 户 变量 


[a 


5 : TASK2-BODY ( -- ) BEGIN 1 M +! &18 MS AGAIN ; /定义 TASK2 任务 体 
6 : STARTTASKER ( -- ) / 初始 化 并 启动 多 任务 


7 TASK2 BACKGROUND-INIT / TASK2 初始 化 ， 在 RAM 中 创建 TCB2 


8 TASK2 TIB>TCB ACTIVATE TASK2-BODY / 连接 TASK2 任务 体 
9 ADD-FIRSTTASK / 建立 TCB1 循环 链表 
18 TASK2 TIB>TCB ADD-NEXTTASK / 将 TCB2 加 入 循环 链表 
11 MULTI ; / 启动 多 任务 
12 : TASK-TURNKEY ( -- ) / 上 电 启动 向 量 
13 APPLTURNKEY INITM STARTTASKER ; 
在 系统 上 电 启动 运行 后 ， 通 过 终端 任务 TASK1， 建 立新 的 
后 台 任 务 TASK3， 通 过 命令 行 或 文件 方式 动态 载 入 以 下 程序 ， 
实验 代码 如 下 : 


1 VARIBLE N / TASK1 中 TASK3 使 用 的 全 局 变量 N 


2 :INIIN(-- )eN!; 


3 $48 $48 @ INTERRUPT-TASK TASK3 / 建立 中 断 任务 TASK3， 在 FLASH 


区 


/ 中 创建 任务 头 ， 分 配 用 户 变量 
4 : TASK3-BODY ( -- ) BEGIN 1 N +! &16 MS AGAIN ; / 定义 TASK3 任务 体 
5 : STARTTASK3 ( -- ) / 初始 化 并 启动 TASK3 


6 TASK3 BACKGROUND-INIT / TASK3 初始 化 ， 在 RAM 中 创建 TCB3 


7 TASK3 TIB>TCB ACTIVATE TASK2-BODY / 连接 TASK3 任务 体 


8 INITN 


vo 


TASK3 TIB>TCB ADD-NEXTTASK ; / 将 TCB3 加 入 循环 链表 


在 终端 任务 TASK1 里 定义 后 台 任务 TASK2， 多 任务 启动 
后 , TASK1 在 TASK2 任务 体 每 次 调用 MS 时 执行 一 次 ; TASK2 
在 TASK1 每 次 等 待 键 盘 输 入 时 执行 (内 风 PAUSE 向 量 )。 此 
后 ， 若 有 动态 重 构 多 任务 系统 的 需求 ， 可 以 在 并 发 运行 的 终端 
任务 TASK1 里 定义 新 的 后 台 任务 TASK3， 并 通过 任务 初始 化 
BACKGROUND-INIT、 激 活 连接 任务 体 ACTIVATE 以 及 加 入 
循环 链表 ADD-NEXTTASK 等 操作 将 TASK3 加 入 多 任务 循环 。 
第 一 个 终端 任务 TASK1 实际 就 是 系统 任务 〈Stask)， 除 包含 了 
FBS 和 FVMOS 两 个 部 分 外 ， 还 涵盖 了 系统 上 电 前 定义 的 所 有 
任务 以 及 系统 运行 后 通过 各 终端 任务 动态 加 载 的 新 任务 ， 因 此 


所 | 


任务 调度 向 量 ， 并 随即 启动 任务 调度 。 由 于 不 涉及 到 优先 级 调 
度 , 因此 本 算法 的 TCB 循环 链表 维护 就 变 得 十 分 简洁 , 不 需要 


可 以 通过 各 终端 任务 对 所 有 任务 进行 SLEEP、WAKE、STOP 等 


系统 可 重 构 、 可 扩展 、 可 移植 、 可 交互 的 多 任务 组 织 管理 目标 。 

与 文献 [6] 基 于 CPU 调度 的 Stand Alone Forth88 多 任务 系 
统 相 比 ， 本 文 提 出 的 FVMOS 多 任务 体系 架构 有 诸多 的 优点 。 
在 嵌入 式 有 限 存储 空间 利用 方面 ,基于 FVM 的 架构 缩减 了 TCB 
的 规模 。 任 务 切换 仅仅 只 需 保留 或 恢复 SP 指针 就 能 实现 ， 这 
样 就 可 将 TCB 中 数 十 项 CPU 映像 存储 压缩 到 只 需 6 个 单元 。 
在 重 构 、 扩 展 、 移 植 方面 ， 整 个 多 任务 管理 系统 建构 在 系统 的 
FBS 高 级 定义 之 上 ， 做 到 与 硬件 无 关 。 在 系统 简洁 性 方面 ， 特 
殊 的 调度 方式 和 精简 的 TCB 结构 , 使 得 系统 不 需要 新 建 和 维护 
任务 队列 。 与 Stand Alone Forth88 中 创建 任务 的 同一 层次 代码 
(LOC) 相 比 ， 至 少 压 缩 了 10 倍 ， 整 体 压缩 了 16 倍 ， 如 表 
2 所 示 。 在 快捷 性 方面 ， 除 了 将 常规 带 优先 级 的 时 间 片 轮转 调 
度 算法 复杂 度 从 O(n?) 降低 到 O(n) 之 外 ， 所 有 多 任务 管理 算法 
的 复杂 度 均 为 0(1) 。 


表 2 代码 量 (LOC) 对 比 


la 


对 比 项 Stand Alone Forth88 FVMOS 
TASK 136 12 
MULTITASKER 2500 155 


5 ”结束 语 


从 以 上 分 析 可 以 看 出 , FVMOS 与 传统 方式 有 本 质 的 不 同 ， 
不 存在 严格 区 分 的 模块 、 层 次 、 微 内 核 等 传统 结构 。 虽 然 系 
统 天 生 有 具有 可 重 构 特性 ， 甚 至 构件 化 特征 ， 但 与 采用 构件 化 操 
作 系 统 也 不 尽 相 同 。Forth 特有 的 堆栈 和 字典 式 结构 决定 了 其 
体系 架构 和 运行 机 制 的 特殊 性 。 一 方面 , Forth 特殊 的 穿线 编码 
(Threaded Code)， 使 Forth 堆栈 机 的 词典 式 结构 本 身 就 是 一 
个 可 动态 、 交互 扩展 的 开放 性 程序 库 。 除 此 之 外 , Forth 虚拟 机 
环境 还 为 系统 提供 了 难得 的 跨 平台 能 力 。 
正 是 因为 这 些 特性 ， 给 基于 虚拟 机 的 多 任务 组 织 管理 带 来 了 难 
题 。 例 如 ， 由 于 所 有 过 程 〈 包 括 任务 调度 ) 都 必须 在 Quit 控制 
下 ， 因 此 经 典 的 多 任务 管理 算法 难以 直接 派 上 用 场 。 虽 然 实 
性 还 有 待 提高 ， 但 本 文 研究 的 FVMOS 体系 架构 以 及 多 任 
管理 算法 具有 一 定 的 现实 指导 意义 。 
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